#pragma once

#include <iostream>

#include "TcpSocket.hpp"

#include <sys/select.h>

#include <sys/time.h>

static const uint16_t defaultport = 8050;

static const int fd_num_max = (sizeof(fd_set) * 8); // 具体的位图可监听数量

static const int defaultfd = -1;

class SelectServer
{
public:
    SelectServer(uint16_t port = defaultport) : _port(port)
    {
        for (int i = 0; i < fd_num_max; ++i)
        {
            _fd_array[i] = -1;
        }
    }
    bool Init()
    {
        _listensock.Socket();
        _listensock.Bind(_port);
        _listensock.Listen();
        return true;
    }

    void Start()
    {
        int listensock = _listensock.GetFd();

        _fd_array[0] = listensock;

        for (;;)
        {
            fd_set rfds;    // 读文件描述符集
            FD_ZERO(&rfds); // 清空描述符集 提前进行初始化
            int maxfd = _fd_array[0];
            // std::cout<<fd_num_max<<std::endl; debug

            for (int i = 0; i < fd_num_max; ++i)
            { // 此处为暴力遍历 可以使用滑动窗口算法
                if (_fd_array[i] == defaultfd)
                    continue;
                FD_SET(_fd_array[i], &rfds);
                maxfd = (maxfd < _fd_array[i] ? _fd_array[i] : maxfd);
            }
            lg(INFO, "The current maxfd is : %d", maxfd);

            // 不能直接accept 本质上accept就表示检测并获取listensock上的事件
            // 新连接的到来等价于读事件的就绪

            // FD_SET(listensock, &rfds);       // 将文件描述符写入至读文件描述符集中
            // struct timeval timeout = {0, 0}; // 非阻塞
            struct timeval timeout = {5, 0}; // 超时事件

            // int n = select(listensock + 1, &rfds, nullptr, nullptr, /*&timeout*/ nullptr);
            int n = select(maxfd + 1, &rfds, nullptr, nullptr, /*nullptr*/ &timeout);

            switch (n)
            {
            case 0:
                printf("Time out, timeout: %ld . %ld\n", timeout.tv_sec, timeout.tv_usec);
                break;
            case -1:
                printf("Select Error\n");
                break;
            default:
                printf("%d fd Even Ready, timeout: %ld . %ld\n", n, timeout.tv_sec, timeout.tv_usec);
                Dispatcher(rfds); // 通过select()函数判断位图中是否有读事件发生
                                    // 若是有读事件发生则调用对应的读事件发生 Dispatcher()
                sleep(2);
                break;
            }
        }
    }

    void Accepter()
    { // 连接管理器
        std::string clientip;
        uint16_t clientport;
        int sock = _listensock.Accept(&clientip, &clientport); // 获取新连接的IP与端口
        if (sock < 0)
        {
            lg(WARNING, "Accept error");
            return;
        }
        lg(INFO, "Accept sucess %s: %d , sockfd: %d", clientip.c_str(), clientport, sock);

        // 将获取到的套接字添加到辅助数组里
        int pos = 1; // 从 1 开始 , 0 已经被监听套接字占用
        for (; pos < fd_num_max; ++pos)
        {
            if (_fd_array[pos] != defaultfd)
                continue;
            break;
        }
        if (pos == fd_num_max)
        {
            lg(WARNING, "server is full, close %d. ", sock);
            close(sock);
        }
        else
        {
            _fd_array[pos] = sock;
        }
    }

    void Recver(int fd,int i){
        // 该程序只关心读事件
                    char inbuff[1024];
                    ssize_t n = read(fd, inbuff, sizeof(inbuff) - 1);
                    // 直接调用read可能存在信息获取不完整等问题

                    if (n > 0)
                    { // 读取成功
                        inbuff[n] = 0;
                        printf("Get a massage for %d fd: %s\n", fd, inbuff);
                    }
                    else if (n == 0)
                    { // 连接被关闭
                        lg(INFO, "Fd %d connect closed", fd);
                        close(fd);
                        _fd_array[i] = defaultfd;
                    }
                    else
                    { // 读取失败
                        lg(WARNING, "Fd %d recv error", fd);
                        close(fd);
                        _fd_array[i] = defaultfd;
                    }
    }

    void DebugPrint()
    {
        std::cout << "Fd List:" << std::endl;
        for (int i = 0; i < fd_num_max; ++i)
        {
            if (_fd_array[i] == defaultfd)
                continue;
            std::cout << "_fd_array[" << i << "] : " << _fd_array[i] << std::endl;
        }
        std::cout << std::endl;
    }

    // void Dispatcher(fd_set &rfds)
    // {
    //     // for (int i = 0; i < fd_num_max; ++i)
    //     // {
    //     //     std::cout << _fd_array[i] << " ";
    //     // }
    //     // std::cout << std::endl;
    //     // std ::cout << defaultfd << std::endl;
    //     // debug
    //     if (FD_ISSET(_listensock.GetFd(), &rfds))
    //     { // 判断事件是否就绪
    //         std::string clientip;
    //         uint16_t clientport;
    //         int sock = _listensock.Accept(&clientip, &clientport); // 获取新连接的IP与端口
    //         if (sock < 0)
    //             return;
    //         lg(INFO, "Accept sucessm %s: %d , sockfd: %d", clientip.c_str(), clientport, sock);

    //         // 将获取到的套接字添加到辅助数组里
    //         int pos = 1; // 从 1 开始 , 0 已经被监听套接字占用
    //         for (; pos < fd_num_max; ++pos)
    //         {
    //             if (_fd_array[pos] != defaultfd)
    //                 continue;
    //             break;
    //         }
    //         if (pos == fd_num_max)
    //         {
    //             lg(WARNING, "server is full, close %d. ", sock);
    //             close(sock);
    //         }
    //         else
    //         {
    //             _fd_array[pos] = sock;
    //         }
    //     }
    //     DebugPrint();
    // }

    void Dispatcher(fd_set &rfds) // 事件派发器 将不同的事件派发给不同的模块
    {
        for (int i = 0; i < fd_num_max; ++i)
        {
            int fd = _fd_array[i]; // 取出辅助数组中存储的描述符
            if (fd == defaultfd)
                continue; // 如果为默认fd则直接进行下一次循环

            // if (FD_ISSET(_listensock.GetFd(), &rfds))
            if (FD_ISSET(fd, &rfds))
            {                                  // 判断事件是否就绪
                if (fd == _listensock.GetFd()) // 如果描述符为监听套接字 则进行新连接的获取
                {
                    Accepter();
                }
                else
                { // 如果不为监听套接字则表示其他描述符的读事件已经就绪
                    Recver(fd,i);
                }
            }
        }
        DebugPrint();
    }

    ~SelectServer()
    {
        _listensock.Close();
    }

private:
    NetSocket _listensock;
    uint16_t _port;
    int _fd_array[fd_num_max]; // 辅助数组 用于传递文件描述符
};
